-- card: 24055 from stack: in.2r -- bmap block id: 0 -- flags: 0000 -- background id: 3837 -- name: NumberOfDAs ----- HyperTalk script ----- on opencard put empty into card field "show the number of DAs" end opencard -- part 2 (button) -- low flags: 00 -- high flags: 8004 -- rect: left=180 top=271 right=294 bottom=288 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 1 -- font id: 0 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: numberOfDAs() ----- HyperTalk script ----- on mouseUp if the optionkey is down then pass mouseup put numberOfDAs()&&"DAs are installed" into card field "show the number of DAs" end mouseUp -- part 3 (field) -- low flags: 00 -- high flags: 0000 -- rect: left=317 top=277 right=294 bottom=467 -- title width / last selected line: 0 -- icon id / first selected line: 0 / 0 -- text alignment: 0 -- font id: 3 -- text size: 12 -- style flags: 0 -- line height: 16 -- part name: show the number of das -- part contents for background part 10 ----- text ----- 12 -- part contents for background part 5 ----- text ----- NumberOfDAs -- part contents for background part 6 ----- text ----- Returns the number of DAs installed in the system. Send comments & suggestions to Aron Roberts: CompuServe: 73075,1342 GEnie: ARON ARPA Internet: csaron@garnet.Berkeley.EDU BITNET: CSARON@UCBCMSA.BITNET This XFCN may be freely distributed. The numberOfDAs() function and getDANames* command may be used in any noncommercial or commercial stacks. -- part contents for background part 7 ----- text ----- Syntax: numberOfDAs() Returns the count of the DAs in the Apple menu. This number FUNCTION can be placed into any container. (The pair of parens, "()", at the end of "numberOfDAs" is REQUIRED.) Example: put numberOfDAs() into theNumber repeat with numericVariable = 1 to numberOfDAs()